home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 40
/
Aminet 40 (2000)(Schatztruhe)[!][Dec 2000].iso
/
Aminet
/
misc
/
emu
/
ATUtilities.lha
/
ATUtilities
/
ohelp.c
< prev
next >
Wrap
C/C++ Source or Header
|
2000-09-29
|
47KB
|
1,833 lines
/* ******************************************************************* */
/* ** ** */
/* ** ATUtilities Online Help ** */
/* ** Copright (C) 1993-1994 by Thomas Dreibholz ** */
/* ** All rights reserved ** */
/* ** ** */
/* ******************************************************************* */
#define PAGE_INDEX 1
#define PAGE_TEXT 2
#define PAGE_MEMORY 5
#include "ATUtilities.h"
/*
#define CreateBoolGadget(win,x,y,w,h,text,id) CreateBoolToggleGadget(0,win,x,y,w,h,text,id)
#define CreateMinGadget(win,x,y,w,h,text,id) CreateBoolToggleGadget(4,win,x,y,w,h,text,id)
#define CreateMBoolGadget(win,x,y,w,h,text,id) CreateBoolToggleGadget(5,win,x,y,w,h,text,id)
#define CreateNToggleGadget(win,x,y,w,h,text,id) CreateBoolToggleGadget(1,win,x,y,w,h,text,id)
#define CreateSToggleGadget(win,x,y,w,h,text,id) CreateBoolToggleGadget(2,win,x,y,w,h,text,id)
#define DrawCNTextBorder(win,x,y,w,h,text) DrawNTextBorder(win,x,y,w,h,text,1)
#define DrawCPTextBorder(win,x,y,w,h,text) DrawPTextBorder(win,x,y,w,h,text,1)
#define ScreenInformationBox(scr,t,a,b,c,d,i) InformationBox(scr,t,a,b,c,d,i)
*/
extern struct Library *DiskfontBase;
/* feste Strukturen */
UBYTE *PrefsName = "AT:Prefs/OnlineHelp.prefs";
UBYTE st[] = {0,1,3,4,7};
UBYTE *Statistik[] = {"",
"Index",
"Text ",
"\x9b1;33;40m\x9b4;33;4mStatistik\x9b0;33;40m",
"\x9b4;33;40mSeitenübersicht\x9b0;33;40m",
"Seite Offset Länge Typ Titel",
" %03ld %6lx %5ld %s %s",
"\x9b4;33;40mBilderübersicht\x9b0;33;40m",
"Bild Offset Größe in Bytes",
"Anzahl der Seiten: %3ld",
"Gesamter Text in KBytes: %3ld",
" %02ld %6lx Extern",
" %02ld %6lx %7ld",
"Anzahl der Bilder: %2ld",
"Gesamter Bildbereich in KBytes: %3ld"};
struct TextAttr Opal=
{
"opal.font",
9,
FS_NORMAL,
FPF_DISKFONT
};
struct OHPrefs
{
UBYTE Cache;
UBYTE Numbers;
UBYTE NumInput;
UBYTE IsPAL;
UBYTE Lace;
UBYTE Pad;
};
struct Page
{
UWORD Length;
UWORD Flags;
ULONG Offset;
ULONG TextOffset;
ULONG GadgetOffset;
ULONG MenuOffset;
ULONG PictureOffset;
};
struct Pages
{
struct Page Page[1000];
};
#define POFFSET(x) hd->Pages->Page[x].PictureOffset
#define MOFFSET(x) hd->Pages->Page[x].MenuOffset
#define GOFFSET(x) hd->Pages->Page[x].GadgetOffset
#define TOFFSET(x) hd->Pages->Page[x].TextOffset
#define OFFSET(x) hd->Pages->Page[x].Offset
#define LENGTH(x) hd->Pages->Page[x].Length
#define FLAGS(x) hd->Pages->Page[x].Flags
struct HelpData
{
UWORD StartPage;
struct OHPrefs OHPrefs;
struct Screen *Screen;
struct Window *MainWindow;
struct Window *IndexWindow;
struct Window *TextWindow;
UWORD HelpScreenHeight;
UWORD IndexWindowHeight;
UWORD TextWindowHeight;
UWORD GadWindowTop;
UWORD PropGadgetHeight;
UWORD GadEnd;
ULONG ViewModes;
struct MenuStrip *MenuStrip;
struct Menu *DateiMenu;
struct Menu *QVMenu;
struct Menu *BilderMenu;
struct Window *GadWindow;
struct Gadget *PropGadget;
struct PropInfo *PropInfo;
struct RastPort *MainRastPort;
struct RastPort *IndexRastPort;
struct RastPort *TextRastPort;
struct MsgPort *MainUserPort;
struct MsgPort *IndexUserPort;
struct MsgPort *TextUserPort;
struct MsgPort *GadUserPort;
struct TextFont *OpalFont;
struct ViewPort *ViewPort;
struct MsgPort *ConPort;
struct IOStdReq *ConReq;
LONG ConDev;
struct FileHandle *HelpFile;
UBYTE *Memory;
struct Pages *Pages;
ULONG Picture[100];
UWORD Page;
UWORD Loaded;
UWORD Flags;
ULONG MainWindowSM;
ULONG IndexWindowSM;
ULONG TextWindowSM;
ULONG GadWindowSM;
ULONG WaitSM;
UWORD NextPage[4];
UWORD LastPage[PAGE_MEMORY+1];
UBYTE LastPagePos;
UBYTE LastPageSelect;
UWORD ShowLastPageBack;
UBYTE String[264];
BOOL IsNTSC;
UWORD Rows;
UWORD ListRows;
UWORD MaxItems;
UWORD PropDown;
UWORD CacheOn;
ULONG CacheSize;
LONG CachePos;
LONG CacheLastPos;
UBYTE *CacheMemory;
UBYTE InputCount;
UWORD Input[3];
UWORD IGy;
UWORD IGw;
UWORD IGs;
UWORD IGPCount;
struct Gadget *IndexGadgets[64];
UWORD IndexGadgetPages[64];
UWORD MenuPageCount;
UWORD MenuNames[25][62];
UWORD MenuPages[25];
UBYTE MenuPicCount;
UBYTE MenuPicNames[25][16];
UBYTE MenuPics[25];
UWORD PropBody;
UWORD LineCount;
UWORD CurrentLine;
UBYTE *Lines[2000];
UWORD OutputPos;
};
UWORD Colors[]={0x97a,0x222,0xddd,0xff5,0xdff,0xe0e,0xf03,0x00f};
BOOL OpenHelp();
VOID CloseHelp();
VOID ConWrite();
VOID RefreshGadWindow();
VOID GetTitle();
VOID LoadPage();
VOID ShowIndexPage();
VOID ShowTextPage();
VOID RemIndexGadgets();
VOID NewProp();
VOID ShowPart();
VOID MakeMenu();
VOID SpecialPage();
VOID GetPictures();
VOID GetItems();
VOID Prefs();
LONG CacheRead();
LONG CacheSeek();
VOID LoadAPicture();
VOID AddPage();
/* Informationen anzeigen */
struct InfoItem ii1=
{
0,0
};
struct InfoItem ii2=
{
1,1,
"Service",
"Haben Sie Anregungen oder",
"Verbesserungswünsche?",
"",
"Senden Sie eine PM (Persönliche Mitteilung)",
"an T.DREIBHOLZ in folgenden Mailboxen:",
"",
"Carrier: 02261/75835",
"Apogee: 02262/68614",
"",
"oder schreiben Sie an:",
"",
"Thomas Dreibholz",
"Molbachweg 7",
"D-51674 Wiehl"
};
struct Info info=
{
2,
&ii1,
&ii2
};
VOID ShowInfo(win,scr)
struct Window *win;
struct Screen *scr;
{
ExtInformationBox(scr,
"ATUtilities Online Help - Information",
"$VER: Online Help - Version 4.0",
"Copyright (C) 1993-1994 by",
"Thomas Dreibholz",
"All rights reserved.",
"AT:Icons/Help",
&info);
ActivateWindow(win);
}
/* Online-Hilfe-Funktion */
VOID Help(name,seite)
UBYTE *name;
UWORD seite;
{
UBYTE s[32];
REGISTER ULONG Class;
REGISTER BOOL ende,bool;
REGISTER UWORD i,j,Code;
REGISTER UWORD MenuNum,ItemNum;
REGISTER ULONG Signale;
register struct IntuiMessage *msg;
register struct HelpData *hd;
register struct Gadget *gad;
if(DiskfontBase==NULL)
{
InfoRequest("Keine Diskfont-Library!");
return;
}
hd=AllocMem(sizeof(struct HelpData),MEMF_CLEAR|MEMF_PUBLIC);
if(hd==NULL)
{
ErrorRequest(ERROR_ALLOC);
return;
}
hd->StartPage=seite;
bool=OpenHelp(hd,name);
if(bool==TRUE)
{
ende=FALSE;
while(ende==FALSE)
{
Signale=Wait(hd->WaitSM);
if((hd->GadUserPort!=NULL) && (Signale & hd->GadWindowSM))
{
msg=GetMsg(hd->GadUserPort);
while(msg!=NULL)
{
Class=msg->Class;
gad=msg->IAddress;
ReplyMsg(msg);
if(Class==GADGETUP)
{
j=gad->GadgetID;
switch(j)
{
case 1000:
if(hd->LastPageSelect>0)
{
if(!(hd->Page==1001))
{
hd->LastPageSelect--;
hd->ShowLastPageBack++;
}
LoadPage(hd,hd->LastPage[hd->LastPageSelect],FALSE);
}
break;
case 2000:
if(hd->ShowLastPageBack>0)
{
hd->ShowLastPageBack--;
hd->LastPageSelect++;
LoadPage(hd,hd->LastPage[hd->LastPageSelect],FALSE);
}
break;
case 3000:
LoadPage(hd,hd->Loaded,FALSE);
break;
default:
LoadPage(hd,hd->NextPage[j],TRUE);
break;
}
}
else if(Class==ACTIVEWINDOW)
ActivateWindow(hd->MainWindow);
msg=GetMsg(hd->GadUserPort);
}
}
if(Signale & hd->MainWindowSM)
{
msg=GetMsg(hd->MainUserPort);
while(msg!=NULL)
{
Class=msg->Class;
Code=msg->Code;
gad=msg->IAddress;
ReplyMsg(msg);
switch(Class)
{
case GADGETUP:
j=gad->GadgetID;
switch(j)
{
case 1:
ende=TRUE;
break;
case 2:
LoadPage(hd,0,TRUE);
break;
case 3:
if((hd->Flags==PAGE_TEXT)&&(hd->LineCount>hd->Rows))
{
hd->PropDown=0;
j=hd->PropInfo->VertPot/(65535/hd->PropBody);
ShowPart(hd,j);
}
break;
}
break;
case GADGETDOWN:
j=gad->GadgetID;
switch(j)
{
case 3:
if((hd->Flags==PAGE_TEXT)&&(hd->LineCount>hd->Rows))
{
hd->PropDown=1;
}
break;
}
break;
case MOUSEMOVE:
if(hd->PropDown!=0)
{
AbortIO(hd->ConReq);
j=hd->PropInfo->VertPot/(65535/hd->PropBody);
ShowPart(hd,j);
}
break;
case MENUPICK:
MenuNum=MENUNUM(Code);
ItemNum=ITEMNUM(Code);
switch(MenuNum)
{
case 2:
switch(ItemNum)
{
case 0:
ende=TRUE;
break;
case 2:
ShowInfo(hd->MainWindow,hd->Screen);
break;
case 4:
SpecialPage(hd,1);
break;
case 5:
SpecialPage(hd,2);
break;
case 6:
SpecialPage(hd,3);
break;
case 8:
Prefs(hd);
break;
}
break;
case 1:
if((hd->MenuPageCount!=0)&&(ItemNum<=hd->MenuPageCount))
LoadPage(hd,hd->MenuPages[hd->MenuPageCount-ItemNum-1],TRUE);
break;
case 0:
if((hd->MenuPicCount!=0)&&(ItemNum<=hd->MenuPicCount))
LoadAPicture(hd,hd->MenuPics[hd->MenuPicCount-ItemNum-1]);
ActivateWindow(hd->MainWindow);
break;
}
break;
case VANILLAKEY:
if(hd->OHPrefs.NumInput)
{
if((Code>='0')&&(Code<='9'))
{
hd->Input[hd->InputCount]=Code;
hd->InputCount++;
sprintf(&s,"Seiteneingabe: #%c%c%c",hd->Input[0],
hd->Input[1],
hd->Input[2]);
DrawCNTextBorder(hd->MainWindow,320,10,310,12,&s);
if(hd->InputCount>2)
{
LoadPage(hd,(hd->Input[0]-48)*100+
(hd->Input[1]-48)*10+
(hd->Input[2]-48),TRUE);
}
}
}
break;
}
msg=GetMsg(hd->MainUserPort);
}
}
if(Signale & hd->IndexWindowSM)
{
msg=GetMsg(hd->IndexUserPort);
while(msg!=NULL)
{
Class=msg->Class;
gad=msg->IAddress;
ReplyMsg(msg);
if(Class==GADGETUP)
{
j=gad->GadgetID;
LoadPage(hd,hd->IndexGadgetPages[j],TRUE);
}
else if(Class==ACTIVEWINDOW)
ActivateWindow(hd->MainWindow);
msg=GetMsg(hd->IndexUserPort);
}
}
if(Signale & hd->TextWindowSM)
{
msg=GetMsg(hd->TextUserPort);
while(msg!=NULL)
{
Class=msg->Class;
ReplyMsg(msg);
if(Class==ACTIVEWINDOW)
ActivateWindow(hd->MainWindow);
msg=GetMsg(hd->TextUserPort);
}
}
}
}
WBenchToFront();
CloseHelp(hd);
FreeMem(hd,sizeof(struct HelpData));
}
/* Hilfe starten */
BOOL OpenHelp(hd,name)
struct HelpData *hd;
UBYTE *name;
{
register struct FileHandle *fh;
UBYTE c,id[8];
WORD a,i;
LONG b;
hd->ConDev=-1L;
hd->HelpFile=Open(name,MODE_OLDFILE);
if(hd->HelpFile==NULL)
{
MultiRequest("Kann Hilfedatei nicht öffnen:",name,"Okay",NULL);
return(FALSE);
}
Read(hd->HelpFile,&id,8);
if(strncmp(&id,"HELP_2.0",8))
{
InfoRequest("Hilfedatei hat kein HELP_2.0-Format!");
return(FALSE);
}
hd->OpalFont=GetOpalFont();
fh=Open(PrefsName,MODE_OLDFILE);
if(fh!=NULL)
{
Read(fh,&hd->OHPrefs,sizeof(struct OHPrefs));
Close(fh);
}
if(hd->OHPrefs.Lace==0)
hd->ViewModes=HIRES;
else
{
hd->ViewModes=HIRES|LACE;
hd->ListRows=16;
}
if(hd->OHPrefs.IsPAL==0)
{
hd->IsNTSC=TRUE;
hd->ListRows=18;
if(hd->OHPrefs.Lace==0)
{
hd->ListRows=hd->Rows=18;
hd->MaxItems=18;
hd->GadWindowTop=182;
hd->HelpScreenHeight=200;
hd->IndexWindowHeight=154;
}
else
{
hd->Rows=43;
hd->MaxItems=24;
hd->GadWindowTop=382;
hd->HelpScreenHeight=400;
hd->IndexWindowHeight=354;
}
}
else
{
hd->IsNTSC=FALSE;
if(hd->OHPrefs.Lace==0)
{
hd->ListRows=hd->Rows=25;
hd->MaxItems=24;
hd->GadWindowTop=238;
hd->HelpScreenHeight=256;
hd->IndexWindowHeight=210;
}
else
{
hd->Rows=57;
hd->MaxItems=24;
hd->GadWindowTop=494;
hd->HelpScreenHeight=512;
hd->IndexWindowHeight=466;
}
}
hd->GadEnd=hd->IndexWindowHeight-12;
hd->TextWindowHeight=hd->IndexWindowHeight-1;
hd->PropGadgetHeight=hd->IndexWindowHeight+1;
hd->Screen=CreateScreen(0L,640,hd->HelpScreenHeight,3,hd->ViewModes);
if(hd->Screen==NULL)
{
InfoRequest("Kann Screen nicht öffnen!");
return(FALSE);
}
hd->ViewPort=&hd->Screen->ViewPort;
LoadRGB4(hd->ViewPort,&Colors,8);
hd->IndexWindow=CreateWindow(hd->Screen,0L,
11,26,582,hd->IndexWindowHeight,
GADGETUP|ACTIVEWINDOW,
BORDERLESS);
if(hd->IndexWindow==NULL)
{
InfoRequest("Kann Fenster nicht öffnen!");
return(FALSE);
}
hd->TextWindow=CreateWindow(hd->Screen,0L,
12,27,580,hd->TextWindowHeight,
ACTIVEWINDOW,
NOCAREREFRESH|BORDERLESS);
if(hd->TextWindow==NULL)
{
InfoRequest("Kann Fenster nicht öffnen!");
return(FALSE);
}
hd->MainWindow=CreateWindow(hd->Screen,0L,
0,0,640,hd->HelpScreenHeight,
GADGETUP|MENUPICK|GADGETDOWN|MOUSEMOVE|VANILLAKEY,
ACTIVATE|BORDERLESS);
if(hd->MainWindow==NULL)
{
InfoRequest("Kann Fenster nicht öffnen!");
return(FALSE);
}
hd->MainWindow->BlockPen=2;
hd->MainRastPort=hd->MainWindow->RPort;
hd->IndexRastPort=hd->IndexWindow->RPort;
hd->TextRastPort=hd->TextWindow->RPort;
hd->MainUserPort=hd->MainWindow->UserPort;
hd->IndexUserPort=hd->IndexWindow->UserPort;
hd->TextUserPort=hd->TextWindow->UserPort;
hd->MainWindowSM=(1L<<hd->MainUserPort->mp_SigBit);
hd->IndexWindowSM=(1L<<hd->IndexUserPort->mp_SigBit);
hd->TextWindowSM=(1L<<hd->TextUserPort->mp_SigBit);
hd->MainWindow->UserData=NULL;
hd->IndexWindow->UserData=NULL;
hd->TextWindow->UserData=NULL;
SetFont(hd->MainRastPort,hd->OpalFont);
SetFont(hd->IndexRastPort,hd->OpalFont);
CreateBoolGadget(hd->MainWindow,10,10,150,12,"Ende",1);
CreateBoolGadget(hd->MainWindow,165,10,150,12,"Index",2);
hd->PropGadget=CreatePropGadget(hd->MainWindow,600,25,30,hd->PropGadgetHeight,0,0,0,65535,3);
hd->PropInfo=hd->PropGadget->SpecialInfo;
DrawNBorder(hd->MainWindow,10,25,584,hd->PropGadgetHeight,0);
SetAPen(hd->MainRastPort,3);
WriteText(hd->MainRastPort,40,40,"ATUtilities Online-Hilfe - Version 4.0");
WriteText(hd->MainRastPort,40,60,"Hilfedatei wird bearbeitet.");
WriteText(hd->MainRastPort,40,80,"Bitte warten...");
hd->ConPort=CreatePort("onlinehelp-console.port",0L);
if(hd->ConPort==NULL)
{
InfoRequest("Kann MsgPort nicht erstellen!");
return(FALSE);
}
hd->ConReq=CreateExtIO(hd->ConPort,sizeof(struct IOStdReq));
if(hd->ConReq==NULL)
{
InfoRequest("Kann IOStdReq nicht erstellen!");
return(FALSE);
}
hd->ConReq->io_Data=hd->TextWindow;
hd->ConReq->io_Length=sizeof(struct Window);
hd->ConDev=OpenDevice("console.device",0L,hd->ConReq,0L);
if(hd->ConDev!=0)
{
InfoRequest("Kann Console-Device nicht öffnen!");
return(FALSE);
}
ConWrite(hd,"\x9b0;33;40m");
if(hd->OHPrefs.Cache!=0)
{
Seek(hd->HelpFile,0,OFFSET_END);
hd->CacheSize=Seek(hd->HelpFile,0,OFFSET_BEGINNING);
hd->CacheMemory=AllocMem(hd->CacheSize,MEMF_CLEAR|MEMF_PUBLIC);
if(hd->CacheMemory!=NULL)
{
b=Read(hd->HelpFile,hd->CacheMemory,hd->CacheSize);
if(b==hd->CacheSize) hd->CacheOn=1;
}
}
hd->Pages=AllocMem(sizeof(struct Pages),MEMF_CLEAR|MEMF_PUBLIC);
if(hd->Pages==NULL)
{
ErrorRequest(ERROR_ALLOC);
return(FALSE);
}
hd->Memory=AllocMem(50000,MEMF_CLEAR|MEMF_PUBLIC);
if(hd->Memory==NULL)
{
ErrorRequest(ERROR_ALLOC);
return(FALSE);
}
CacheSeek(hd,-4,OFFSET_END);
CacheRead(hd,&b,4L);
CacheSeek(hd,b,OFFSET_BEGINNING);
for(i=0;i<1000;i++)
{
CacheRead(hd,&c,1L);
if(c!=0)
{
CacheRead(hd,&a,2L);
CacheRead(hd,&b,4L);
LENGTH(i)=a;
OFFSET(i)=b;
FLAGS(i)=c;
CacheRead(hd,&b,4L);
TOFFSET(i)=b;
CacheRead(hd,&b,4L);
GOFFSET(i)=b;
CacheRead(hd,&b,4L);
MOFFSET(i)=b;
CacheRead(hd,&b,4L);
POFFSET(i)=b;
}
}
for(i=0;i<100;i++)
{
CacheRead(hd,&hd->Picture[i],4L);
}
if(OFFSET(hd->StartPage)==0)
{
MultiRequest("Angegebene Startseite existiert nicht!",
"Hauptindex wird als Ersatz angezeigt.",
"Okay",NULL);
hd->StartPage=0;
}
hd->MenuStrip=BuildMenuStrip(hd->MainWindow,7,AUTOBACKPEN);
if(hd->MenuStrip==NULL)
{
InfoRequest("Kein Speicher für Menu!");
return(FALSE);
}
hd->Page=12345;
LoadPage(hd,hd->StartPage,TRUE);
return(TRUE);
}
/* Hilfe beenden */
VOID CloseHelp(hd)
struct HelpData *hd;
{
if(hd->MenuStrip) RemoveMenuStrip(hd->MenuStrip,TRUE);
if(hd->ConDev==0) CloseDevice(hd->ConReq);
if(hd->GadWindow) DeleteStdWindow(hd->GadWindow);
if(hd->TextWindow) DeleteStdWindow(hd->TextWindow);
if(hd->IndexWindow)
{
RemIndexGadgets(hd);
DeleteStdWindow(hd->IndexWindow);
}
if(hd->MainWindow) DeleteStdWindow(hd->MainWindow);
if(hd->Screen) CloseScreen(hd->Screen);
if(hd->ConReq) DeleteExtIO(hd->ConReq);
if(hd->ConPort) DeletePort(hd->ConPort);
if(hd->Pages) FreeMem(hd->Pages,sizeof(struct Pages));
if(hd->Memory) FreeMem(hd->Memory,50000);
if(hd->CacheMemory) FreeMem(hd->CacheMemory,hd->CacheSize);
if(hd->HelpFile) Close(hd->HelpFile);
}
/* Text im Console-Display ausgeben */
VOID ConWrite(hd,text)
struct HelpData *hd;
UBYTE *text;
{
hd->ConReq->io_Data=text;
hd->ConReq->io_Length=strlen(text);
hd->ConReq->io_Command=CMD_WRITE;
SendIO(hd->ConReq);
}
/* Gadget-Fenster erstellen */
VOID RefreshGadWindow(hd,title)
struct HelpData *hd;
BOOL title;
{
REGISTER WORD i;
if(hd->GadWindow!=NULL)
DeleteStdWindow(hd->GadWindow);
if(title==TRUE)
{
GetTitle(hd,hd->Page);
DrawMNTextBorder(hd->MainWindow,320,10,310,12,&hd->String);
}
hd->GadWindow=CreateWindow(hd->Screen,0L,
0,hd->GadWindowTop,640,15,
GADGETUP|ACTIVEWINDOW,
BORDERLESS);
if(hd->GadWindow!=NULL)
{
SetFont(hd->GadWindow->RPort,hd->OpalFont);
hd->GadUserPort=hd->GadWindow->UserPort;
hd->GadWindowSM=(1L<<hd->GadUserPort->mp_SigBit);
for(i=0;i<=3;i++) hd->NextPage[i]=0xFFFF;
if(hd->Page!=1001)
{
if(hd->Page>0)
{
for(i=(hd->Page-1);i>=0;i--)
if(FLAGS(i)==PAGE_INDEX)
{ hd->NextPage[0]=i; break; }
}
if(hd->Page!=0) hd->NextPage[3]=0;
if(hd->Page<999)
{
for(i=(hd->Page+1);i<=999;i++)
if(FLAGS(i)==PAGE_INDEX)
{ hd->NextPage[3]=i; break; }
}
if((hd->Page>0)&&(hd->Flags==PAGE_TEXT))
{
for(i=(hd->Page-1);i>=0;i--)
{
if(OFFSET(i)!=0)
{
if(FLAGS(i)==PAGE_TEXT)
hd->NextPage[1]=i;
break;
}
}
}
if(hd->Page<999)
{
for(i=(hd->Page+1);i<=999;i++)
{
if(OFFSET(i)!=0)
{
if(FLAGS(i)==PAGE_TEXT)
hd->NextPage[2]=i;
break;
}
}
}
for(i=0;i<=3;i++)
{
if(hd->NextPage[i]!=0xFFFF)
{
GetTitle(hd,hd->NextPage[i]);
CreateMBoolGadget(hd->GadWindow,38+(i*143),1,135,12,&hd->String,i);
}
}
if(hd->LastPageSelect>0)
CreateBoolGadget(hd->GadWindow,10,1,22,12,"«",1000);
if(hd->ShowLastPageBack>0)
CreateBoolGadget(hd->GadWindow,608,1,22,12,"»",2000);
}
else
{
GetTitle(hd,hd->Loaded);
CreateMBoolGadget(hd->GadWindow,10,1,620,12,&hd->String,3000);
}
}
else
{
DisplayBeep(NULL);
DisplayBeep(NULL);
DisplayBeep(NULL);
DisplayBeep(NULL);
hd->GadWindowSM=0;
hd->GadUserPort=NULL;
}
hd->WaitSM=hd->GadWindowSM+hd->MainWindowSM+hd->IndexWindowSM+hd->TextWindowSM;
}
/* Titel einer Seite ermitteln */
VOID GetTitle(hd,p)
struct HelpData *hd;
LONG p;
{
ULONG i,o;
i=OFFSET(p);
if(i!=0)
{
o=CacheSeek(hd,i,OFFSET_BEGINNING);
if(hd->OHPrefs.Numbers==0)
{
CacheRead(hd,&hd->String,256L);
}
else
{
sprintf(&hd->String,"#%03ld: ",p);
CacheRead(hd,&hd->String[6],256L);
}
CacheSeek(hd,o,OFFSET_BEGINNING);
}
else hd->String[0]=0x00;
}
/* Seite anzeigen */
VOID LoadPage(hd,num,add)
struct HelpData *hd;
UWORD num;
BOOL add;
{
hd->InputCount=0;
hd->Input[1]='-';
hd->Input[2]='-';
if(num==hd->Page) return;
if(OFFSET(num)!=0)
{
hd->Page=num;
hd->Loaded=num;
hd->Flags=FLAGS(num);
if(add==TRUE) AddPage(hd);
ClearMenuStrip(hd->MainWindow);
RemIndexGadgets(hd);
switch(hd->Flags)
{
case PAGE_INDEX:
NewProp(hd,1);
ShowIndexPage(hd,num);
break;
case PAGE_TEXT:
ShowTextPage(hd,num);
break;
}
}
else
{
DisplayBeep(hd->Screen);
DisplayBeep(hd->Screen);
}
}
/* Indexseite anzeigen */
VOID ShowIndexPage(hd,num)
struct HelpData *hd;
UWORD num;
{
UBYTE *m;
REGISTER LONG i,j;
REGISTER UWORD x,y,w;
REGISTER UBYTE c;
UWORD wort;
x=15; y=11;
j=TOFFSET(num);
if(j!=0)
{
i=LENGTH(num);
CacheSeek(hd,j,OFFSET_BEGINNING);
CacheRead(hd,hd->Memory,i);
/* ----- Testausgabe -------------------------------------------------- */
SetAPen(hd->IndexRastPort,3);
m=hd->Memory;
for(j=0;j<i;j++)
{
c=m[j];
if(c==0x00)
{
x=15;
y+=10;
}
else
{
Move(hd->IndexRastPort,x,y);
Text(hd->IndexRastPort,&c,1L);
x=x+TextLength(hd->IndexRastPort,&c,1L);
}
}
}
/* ----- Gadgets ------------------------------------------------------ */
j=GOFFSET(num);
if(j!=0)
{
CacheSeek(hd,j,OFFSET_BEGINNING);
j=0; y-=5;
CacheRead(hd,&wort,2L);
while((wort!=0xFFFF)&&(j<=63))
{
hd->IndexGadgetPages[j]=wort;
j++;
CacheRead(hd,&wort,2L);
}
hd->IGPCount=j;
hd->IGy=(hd->GadEnd-y)/27;
if(hd->IGy==0) hd->IGy=1;
hd->IGs=hd->IGPCount/hd->IGy;
if(hd->IGs==0) hd->IGs=1;
hd->IGw=((552-((hd->IGs-1)*5))/hd->IGs);
x=15;
for(i=0;i<hd->IGPCount;i++)
{
if(hd->IndexGadgetPages[i]!=2000)
{
GetTitle(hd,hd->IndexGadgetPages[i]);
hd->IndexGadgets[i]=CreateMBoolGadget(hd->IndexWindow,x,y,hd->IGw,12,&hd->String,i);
x+=hd->IGw+5;
if(x>550) { x=15; y+=15; }
}
else
{
if(x>15)
{
x=15; y+=15;
}
y+=10;
}
}
}
else hd->IGPCount=0;
/* ----- GadWindow und Menüs erstellen -------------------------------- */
WindowToFront(hd->IndexWindow);
RefreshGadWindow(hd,TRUE);
GetItems(hd,num);
GetPictures(hd,num);
MakeMenu(hd);
}
/* Bilder laden */
VOID GetPictures(hd,num)
struct HelpData *hd;
UWORD num;
{
UBYTE byte;
REGISTER ULONG o;
hd->MenuPicCount=0;
o=POFFSET(num);
if(o!=0)
{
CacheSeek(hd,o,OFFSET_BEGINNING);
CacheRead(hd,&byte,1L);
while((byte!=0xFF)&&(hd->MenuPicCount<=hd->MaxItems))
{
hd->MenuPics[hd->MenuPicCount]=byte;
hd->MenuPicCount++;
CacheRead(hd,&byte,1L);
}
}
}
/* Menü-Items laden */
VOID GetItems(hd,num)
struct HelpData *hd;
UWORD num;
{
UWORD wort;
REGISTER UWORD i,j;
REGISTER ULONG o;
hd->MenuPageCount=0;
o=MOFFSET(num);
if(o!=0)
{
CacheSeek(hd,o,OFFSET_BEGINNING);
CacheRead(hd,&wort,2L);
while((wort!=0xFFFF)&&(hd->MenuPageCount<=hd->MaxItems))
{
hd->MenuPages[hd->MenuPageCount]=wort;
hd->MenuPageCount++;
CacheRead(hd,&wort,2L);
}
for(j=0;j<hd->MenuPageCount;j++)
{
if(hd->MenuPages[j]!=2000)
{
GetTitle(hd,hd->MenuPages[j]);
if((strlen(&hd->String))>59) hd->String[59]=0x00;
strcpy(&hd->MenuNames[j],&hd->String);
}
}
}
}
/* Textseite anzeigen */
VOID ShowTextPage(hd,num)
struct HelpData *hd;
UWORD num;
{
REGISTER UWORD i,j;
hd->CurrentLine=0xFFFF;
hd->LineCount=0;
j=LENGTH(num);
CacheSeek(hd,TOFFSET(num),OFFSET_BEGINNING);
CacheRead(hd,hd->Memory,j);
i=0;
while(i<j)
{
hd->Lines[hd->LineCount]=&hd->Memory[i];
i+=(strlen(&hd->Memory[i])+1);
hd->LineCount++;
}
ShowPart(hd,0);
if(hd->LineCount>hd->Rows)
hd->PropBody=hd->LineCount-hd->Rows;
else
hd->PropBody=1;
NewProp(hd,hd->PropBody);
WindowToFront(hd->TextWindow);
RefreshGadWindow(hd,TRUE);
GetPictures(hd,num);
GetItems(hd,num);
MakeMenu(hd);
}
/* Textteil auflisten */
VOID ShowPart(hd,part)
struct HelpData *hd;
UWORD part;
{
UBYTE s[6];
REGISTER BYTE test;
REGISTER UWORD i,j,k;
if(part==hd->CurrentLine) return;
ConWrite(hd,"\x9b0;33;40m");
if(!(hd->LineCount<=hd->Rows))
{
if(part>(hd->LineCount-hd->Rows)) part=hd->LineCount-hd->Rows;
/* part = Zeile, ab der gelistet werden soll
hd->CurrentLine = Zeile, ab der gelistet wird */
if(part>hd->CurrentLine)
{ test=3; if(part-hd->CurrentLine>=hd->ListRows) test=1; }
else if(part<hd->CurrentLine)
{ test=4; if(hd->CurrentLine-part>=hd->ListRows) test=1; }
else
{ test=1; }
switch(test)
{
case 1:
hd->CurrentLine=part;
ConWrite(hd,"\f");
for(i=part;i<part+hd->Rows;i++)
{
ConWrite(hd,hd->Lines[i]);
ConWrite(hd,"\n");
}
break;
case 3:
j=part-hd->CurrentLine;
k=hd->CurrentLine+hd->Rows;
for(i=k;i<(k+j);i++)
{
ConWrite(hd,hd->Lines[i]);
ConWrite(hd,"\n");
}
hd->CurrentLine+=j;
break;
case 4:
j=hd->CurrentLine-part;
k=hd->CurrentLine;
ConWrite(hd,"\x9b");
ConWrite(hd,"H");
for(i=(k-j);i<k;i++)
{
ConWrite(hd,"\x9b");
ConWrite(hd,"L");
ConWrite(hd,hd->Lines[i]);
ConWrite(hd,"\n");
}
sprintf(&s,"%ldH",(hd->Rows+1));
ConWrite(hd,"\x9b");
ConWrite(hd,&s);
ConWrite(hd,"\x9b");
ConWrite(hd,"M");
hd->CurrentLine-=j;
break;
}
}
else
{
ConWrite(hd,"\f");
for(i=0;i<hd->LineCount;i++)
{
ConWrite(hd,hd->Lines[i]);
ConWrite(hd,"\n");
}
}
}
/* Index-Gadgets entfernen */
VOID RemIndexGadgets(hd)
struct HelpData *hd;
{
REGISTER UBYTE i;
register struct Gadget *gad;
if(hd->IndexWindow->UserData!=NULL)
{
for(i=0;i<64;i++)
{
gad=hd->IndexGadgets[i];
if(gad!=NULL)
{
RemoveGadget(hd->IndexWindow,gad);
hd->IndexGadgets[i]=NULL;
hd->IndexGadgetPages[i]=0;
}
}
FreeRemember(&hd->IndexWindow->UserData,TRUE);
hd->IndexWindow->UserData=NULL;
}
SetAPen(hd->IndexRastPort,0);
RectFill(hd->IndexRastPort,0,0,582,hd->IndexWindowHeight);
}
/* Proportionalgadget verändern */
VOID NewProp(hd,v)
struct HelpData *hd;
UWORD v;
{
ModifyProp(hd->PropGadget,hd->MainWindow,NULL,
AUTOKNOB|PROPBORDERLESS|FREEVERT,0,0,0,65535/v);
}
/* Menüleiste erstellen */
VOID MakeMenu(hd)
struct HelpData *hd;
{
REGISTER UWORD i,j;
RemoveMenuStrip(hd->MenuStrip,FALSE);
hd->DateiMenu=AddMenu(hd->MenuStrip,"Datei",5,150);
AddItem(hd->MenuStrip,"Einstellunden ändern",300,'E',TRUE,TRUE);
AddItem(hd->MenuStrip,GetOpalLine(),300,0,FALSE,FALSE);
AddItem(hd->MenuStrip,"Bedienungshinweise",300,'B',TRUE,TRUE);
AddItem(hd->MenuStrip,"Statistik",300,'S',TRUE,TRUE);
AddItem(hd->MenuStrip,"Testseite",300,'T',TRUE,TRUE);
AddItem(hd->MenuStrip,GetOpalLine(),300,0,FALSE,FALSE);
AddItem(hd->MenuStrip,"Informationen zum Programm",300,'I',TRUE,TRUE);
AddItem(hd->MenuStrip,GetOpalLine(),300,0,FALSE,FALSE);
AddItem(hd->MenuStrip,"Hilfe beenden",300,'Q',TRUE,TRUE);
hd->QVMenu=AddMenu(hd->MenuStrip,"Querverweise",160,150);
if(hd->MenuPageCount>0)
{
for(i=0;i<hd->MenuPageCount;i++)
{
if(hd->MenuPages[i]!=2000)
{
MacFormat(hd->MainRastPort,&hd->MenuNames[i],430);
AddItem(hd->MenuStrip,&hd->MenuNames[i],450,0,TRUE,TRUE);
}
else AddItem(hd->MenuStrip,GetOpalLine450(),450,0,FALSE,FALSE);
}
}
else AddItem(hd->MenuStrip,"Nicht verfügbar",300,0,TRUE,FALSE);
hd->BilderMenu=AddMenu(hd->MenuStrip,"Bilder",315,150);
if(hd->MenuPicCount>0)
{
for(i=0;i<hd->MenuPicCount;i++)
{
if(hd->MenuPics[i]!=200)
{
sprintf(&hd->MenuPicNames[i],"Abbildung #%ld",hd->MenuPics[i]+1);
AddItem(hd->MenuStrip,&hd->MenuPicNames[i],300,0,TRUE,TRUE);
}
else AddItem(hd->MenuStrip,GetOpalLine(),300,0,FALSE,FALSE);
}
}
else AddItem(hd->MenuStrip,"Nicht verfügbar",300,0,TRUE,FALSE);
UseMenuStrip(hd->MenuStrip);
ActivateWindow(hd->MainWindow);
}
UBYTE *HString[]=
{
"",
"\x9b1;33;40m\x9b4;33;40mDie Bedienung des Online-Hilfesystems\x9b0;33;40m",
"",
"",
"",
"\x9b4;33;40mDie Auswahl von Seiten\x9b0;33;40m",
"",
"",
"Beim Aufruf des Hilfesystems wird zuerst der Hauptindex geladen. Durch",
"Klicken auf die Gadgets im Index gelangt man zu den entsprechenden",
"Seiten.",
"",
"Am unteren Bildschirmrand befindet sich mindestens ein Gadget; maximal",
"jedoch sechs. Mit ihnen kann zur nächsten bzw. vorhergehenden Seite ge-",
"wechselt werden oder die zuletzt angezeigten Seiten erneut sichten.",
"",
"Gadget-Positionen und ihre Funktionen",
"",
"[«] [......] [......] [......] [......] [»]",
" | | | | | |",
" | | | | | +-- Umkehrung von \"«\"",
" | | | | +-- nächste Indexseite",
" | | | +-- nächste Textseite",
" | | +-- vorhergehende Textseite",
" | +-- vorhergehende Indexseite",
" +-- zuletzt gezeigte Seite sichten",
"",
"",
"",
"\x9b4;33;40mDie Seitentypen\x9b0;33;40m",
"",
"",
"Indexseiten:",
"",
"Auf Indexseiten befinden sich Gadgets, die zu den entsprechenden Text-",
"seiten führen.",
"",
"",
"Textseiten:",
"",
"Auf diesen Seiten stehen die Hilfstexte. Ist der Text größer als der",
"im Textfenster zur Verfügung stehende Platz, so läßt sich der Text-",
"ausschnitt mit dem Proportional-Gadget am rechten Bildschirmrand ver-",
"schieben.",
"",
"Besitzt die Seite Querverweise auf andere Seiten, so sind diese im",
"Menü \"Querverweise\" aufgelistet. Durch Anwahl des entsprechenden",
"Menüpunktes wird die Seite geladen.",
"Gleiches gilt für Bilder und Diagramme im Menü \"Bilder\".",
"",
"",
"",
"\x9b4;33;40mDas Datei-Menü\x9b0;33;40m",
"",
"",
"Der Menüpunkt \"Einstellungen ändern\"",
"",
"Hier lassen sich die Grundeinstellungen des Hilfesystems ändern:",
"",
"Cache-Modus: Die Hilfedatei wird beim Start komplett in den Haupt-",
" speicher geladen. Bei Systemen mit wenig Speicher kann",
" der Modus ausgeschaltet werden. Bei jeder neuen Seite",
" wird dann vom Datenträger nachgeladen.",
"",
"PAL-Modus: Es wird statt des amerikanischen NTSC-Videosystems",
" (600x200 Pixel) das europäische PAL-System (640x256 Pixel)",
" benutzt.",
"",
"Interlace: Die Auflösung wird mit Hilfe des Interlace-Systems ver-",
" doppelt: 640x512 Pixel im PAL-Modus, 640x400 Pixel im NTSC-",
" Modus. Dies ist besonders im NTSC-Modus sinnvoll, da bei",
" ihm die Höhe des Bildschirms mit 200 Zeilen sehr gering ist.",
" Für des Interlace-Modus ist eine Flickerfixer-Karte sehr",
" empfehlenswert!",
"",
"Seitennummern: Zusätzlich zum Seitentitel wird auch die Seitennummer",
" angezeigt. Über diese Nummern läuft die gesamte Seiten-",
" verwaltung; deshalb kann diese Funktion beim Einbau der",
" Online-Hilfe in eigene Programme sinnvoll sein. Für den",
" normalen Gebrauch werden diese Nummern nicht benötigt,",
" da die Seitenauswahl über die Maus läuft.",
"",
"SN-Eingabe: Ist diese Funktion eingeschaltet, so kann eine Seitennummer",
" direkt eingegeben werden: Wurde die erste Ziffer gedrückt,",
" so erscheint rechts oben neben dem Index-Gadget statt der",
" Seitentitelanzeige die Nummerneingabeanzeige. Die direkte",
" Seiteneingabe ist wie auch die Seitennummernanzeige nur",
" für Entwicklungszwecke gedacht und wird deshalb bei Nor-",
" malgebrauch nicht benötigt.",
"",
"",
"Der Menüpunkt \"Bedienungshinweise\"",
"",
"Hiermit wird dieser Text angezeigt.",
"",
"",
"Der Menüpunkt \"Informationen zum Programm\"",
"",
"Hiermit werden Informationen über das Hilfesystem, die Version und",
"den noch freien Speicher im Amiga und auf einer eventuell vorhan-",
"denen PC/AT-Brückenkarte angezeigt.",
"",
"",
"Der Menüpunkt \"Hilfe beenden\"",
"",
"Hiermit wird das Hilfesystem geschlossen und in das Anwendungs-",
"programm zurückgekehrt, von welchem das Hilfesystem aufgerufen",
"wurde.",
"",
"",
"",
"\x9b4;33;40mDas Querverweise-Menü\x9b0;33;40m",
"",
"In diesem Menü stehen Querverweise auf andere, zum Thema relevante",
"Seiten. Sie können durch Anwahl des entsprechendes Menüpunktes",
"gesichtet werden. Querverweise sind nicht auf allen Seiten.",
"",
"",
"",
"\x9b4;33;40mDas Bilder-Menü\x9b0;33;40m",
"",
"In diesem Menü befinden sich Bilder, die durch Anwahl der Menüpunkte",
"angezeigt werden. Bilder sind, wie Querverweise, nicht auf allen",
"Seiten.",
"",
"",
"",
"\x9b4;33;40mProgrammänderungen\x9b0;33;40m",
"",
" - Die Steuerung läuft nicht mehr über Seitennummern; sie werden",
" intern verwaltet, der Benutzer sieht stattdessen den Titel der",
" Seite und muß sich keine Nummern mehr merken",
"",
" - Die Seitenanwahl geschieht komplett mit der Maus:",
" Gadgets und Menüs verweisen auf die Seiten",
"",
" - Die Verwaltung der Wechselgadgets im unteren Bildschirmrand wird",
" komplett vom Programm verwaltet und nicht, wie bei Version 1.0,",
" durch Angaben des Hilfedatei-Autors",
"",
" - Unterstützung des amerikanischen NTSC-Modus",
"",
" - Unterstützung des Interlace-Modus",
"",
" - Textseiten können bis zu 2000 Zeilen haben, die Position kann mit",
" dem Proportional-Gadget gegebenenfalls geändert werden",
"",
" - Möglichkeit zur Anzeige von IFF-ILBM Grafiken",
"",
" - Durch den Cache für die Hilfedatei entfällt der Zugriff auf den",
" Datenträger vor jedem Anzeigen einer Seite",
"",
" - Möglichkeit der Textgestaltung durch ANSI-Textstyles",
"",
" - Das Hilfesystem ist jetzt nicht mehr Teil der ATUtilities-",
" Library, sondern ein normales Programm, das durch CLI/Shell",
" gestartet werden kann. Die Help()-Funktion der Library ist",
" entsprechend modifiziert worden und ruft jetzt das Hilfesystem",
" als Programm auf.",
" Vorteil: Nach dem Aufruf durch eine Anwendung wird sofort nach",
" dem Start wieder zum Programm zurückgekehrt; das Hilfe-",
" system ist jetzt ein eigener Task.",
"",
" - Die Seitenanzeige geschieht - unsichtbar für den Benutzer - in",
" vier verschiedenen Fenstern:",
" - Das Hauptfenster mit den Oberen Gadgets und dem Proportional-",
" Gadget liegt im Hintergrund.",
" - Das Textfenster wird nur bei Textseiten in den Vordergrund",
" geholt; es wird über das Console-Device verwaltet.",
" - Das Indexfenster wird nur bei Indexseiten in den Vordergrund",
" geholt; es enthält die Index-Gadgets.",
" - Das Wechselgadget-Fenster enthält die unteren Gadgets und ist",
" auch nur für diese zuständig.",
" Alle Fenster sind Rahmenlos; der Benutzer hat den Eindruck, die",
" gesamte Oberfläche bestünde aus einem Bildschirm.",
"",
" - Neues Hilfedateiformat",
"",
" - Integrierte Testseite, die über alle ANSI-Styles auskunft gibt",
"",
" - Die Bedienungshinweise wurden stark erweitert und sind jetzt",
" wesentlich ausführlicher",
"",
" - Statistikfunktion, die Über Seiten und Bilder Auskunft gibt",
NULL
};
UBYTE *TString[]=
{
"",
"\x9b4;33;40mTestseite für das \x9b1;33;40mOnline-Help-System\x9b0;33;40m",
"",
"",
"Diese Seite dient dazu, die gestalterischen Möglichkeiten aufzuzeigen,",
"die mit diesem System möglich sind:",
"",
" - \x9b4;33;40mUnterstreichen\x9b;0;33;40m",
" - \x9b1;33;40mFettdruck\x9b;0;33;40m",
" - \x9b3;33;40mKursiv\x9b;0;33;40m",
" - \x9b4;33;40mInvers\x9b;0;33;40m",
" - F\x9b0;34;40ma\x9b0;35;40mr\x9b0;36;40mb\x9b0;37;40me\x9b0;38;40mn\x9b0;33;40m",
" - \x9b0;35;40mund \x9b1;36;40mnatürlich \x9b3;37;40mauch \x9b4;34;40m\x9b3;34;40mKombinationen\x9b0;33;40m"
"",
"",
"\x9b0;37;40m[\x9b0;35;40m------------- \x9b1;33;40m72 Zeichen\x9b0;35;40m ---------------------------------------------\x9b0;37;40m]\x9b0;33;40m",
"",
"",
"\x9b1;33;40mWeitere Informationen zur Programmierung des Hilfesystems finden Sie",
"in der Dokumentation der ATUtilities-Library!\x9b0;33;40m",
"",
"",
NULL
};
UBYTE *Test=" \x9b%d;%d;%dmFarbe %d: ABCEFGHIJKLMNOPQRSTUVWXYZ abcdefghijhklmnopqrstuvwxyz\x9b0;33;40m";
VOID Out(hd,text,a,b,c,d,e)
struct HelpData *hd;
UBYTE *text;
ULONG a,b,c,d,e;
{
sprintf(&hd->Memory[hd->OutputPos],text,a,b,c,d,e);
hd->Lines[hd->LineCount]=&hd->Memory[hd->OutputPos];
hd->LineCount++;
hd->OutputPos+=strlen(&hd->Memory[hd->OutputPos])+2;
}
/* Sonderseiten */
VOID SpecialPage(hd,num)
struct HelpData *hd;
UBYTE num;
{
ULONG o;
UBYTE byte;
REGISTER UBYTE x;
REGISTER ULONG q;
REGISTER UWORD i,p;
WindowToFront(hd->TextWindow);
hd->Flags=PAGE_TEXT;
hd->Page=1001;
hd->LineCount=0;
hd->OutputPos=0;
hd->CurrentLine=0xFFFF;
i=0;
RefreshGadWindow(hd,FALSE);
ConWrite(hd,"\x9b0;33;40m\f");
switch(num)
{
case 1:
DrawMNTextBorder(hd->MainWindow,320,10,310,12,"Testseite");
while(TString[i]!=NULL)
{
hd->Lines[i]=TString[i];
i++;
}
hd->LineCount=i;
for(p=0;p<5;p++)
{
Out(hd,"");
for(i=0;i<=7;i++)
{
if(i==0) x=41; else x=40;
Out(hd,Test,st[p],i+30,x,i);
}
}
break;
case 2:
DrawMNTextBorder(hd->MainWindow,320,10,310,12,"Statistik");
ConWrite(hd,"\n\n\n\n\nStatistik wird erstellt...\n");
Out(hd,Statistik[0]);
Out(hd,Statistik[3]);
Out(hd,Statistik[0]);
Out(hd,Statistik[0]);
Out(hd,Statistik[4]);
Out(hd,Statistik[0]);
Out(hd,Statistik[5]);
p=0; q=0;
for(i=0;i<1000;i++)
{
if(OFFSET(i)!=0)
{
GetTitle(hd,i);
MacFormat(hd->TextRastPort,&hd->String,210);
Out(hd,Statistik[6],(ULONG)i,(ULONG)OFFSET(i),(ULONG)LENGTH(i),Statistik[FLAGS(i)],(ULONG)&hd->String);
p++; q+=LENGTH(i);
}
}
Out(hd,Statistik[0]);
Out(hd,Statistik[0]);
Out(hd,Statistik[9],p);
Out(hd,Statistik[10],q/1024);
Out(hd,Statistik[0]);
Out(hd,Statistik[0]);
Out(hd,Statistik[7]);
Out(hd,Statistik[0]);
Out(hd,Statistik[0]);
Out(hd,Statistik[8]);
p=0; q=0;
for(i=0;i<100;i++)
{
o=hd->Picture[i];
if(o!=NULL)
{
CacheSeek(hd,o,OFFSET_BEGINNING);
CacheRead(hd,&byte,1);
if(byte==0)
Out(hd,Statistik[11],i,hd->Picture[i]);
else
{
CacheRead(hd,&o,4L); q+=o;
Out(hd,Statistik[12],i,hd->Picture[i],o);
}
p++;
}
}
Out(hd,Statistik[0]);
Out(hd,Statistik[0]);
Out(hd,Statistik[13],p);
Out(hd,Statistik[14],q/1024);
ConWrite(hd,"\f");
break;
case 3:
DrawMNTextBorder(hd->MainWindow,320,10,310,12,"Bedienungshinweise");
while(HString[i]!=NULL)
{
hd->Lines[i]=HString[i];
i++;
}
hd->LineCount=i;
break;
}
ShowPart(hd,0);
if(hd->LineCount>hd->Rows)
hd->PropBody=hd->LineCount-hd->Rows;
else
hd->PropBody=1;
NewProp(hd,hd->PropBody);
RemIndexGadgets(hd);
}
/* Einstellungen ändern */
VOID Prefs(hd)
struct HelpData *hd;
{
REGISTER UWORD i,j;
register struct FileHandle *fh;
register struct Window *win;
register struct RastPort *rp;
register struct Gadget *g1,*g2,*g3,*g4,*g5;
win=CreateWindow(hd->Screen,"Online-Hilfe - Einstellungen",
75,75,450,105,
CLOSEWINDOW,
ACTIVATE|WINDOWDRAG|WINDOWCLOSE);
if(win!=NULL)
{
win->UserData=NULL;
rp=win->RPort;
SetFont(rp,hd->OpalFont);
if(hd->OHPrefs.Cache==0)
g1=CreateNToggleGadget(win,15,15,410,12,"Cache für Hilfedatei anlegen",1);
else
g1=CreateSToggleGadget(win,15,15,410,12,"Cache für Hilfedatei anlegen",1);
if(hd->OHPrefs.IsPAL==0)
g4=CreateNToggleGadget(win,15,30,410,12,"Europäisches PAL-Videosystem",4);
else
g4=CreateSToggleGadget(win,15,30,410,12,"Europäisches PAL-Videosystem",4);
if(hd->OHPrefs.Lace==0)
g5=CreateNToggleGadget(win,15,45,410,12,"Höhere Auflösung durch Interlace-Modus",5);
else
g5=CreateSToggleGadget(win,15,45,410,12,"Höhere Auflösung durch Interlace-Modus",5);
SetAPen(rp,3);
WriteText(rp,20,67,"Spezialeinstellungen:");
if(hd->OHPrefs.Numbers==0)
g2=CreateNToggleGadget(win,15,72,410,12,"Anzeige mit Seitennummern",2);
else
g2=CreateSToggleGadget(win,15,72,410,12,"Anzeige mit Seitennummern",2);
if(hd->OHPrefs.NumInput==0)
g3=CreateNToggleGadget(win,15,87,410,12,"Direkte Seitennummereingabe",3);
else
g3=CreateSToggleGadget(win,15,87,410,12,"Direkte Seitennummereingabe",3);
WaitPort(win->UserPort);
ReplyMsg(GetMsg(win->UserPort));
if(g1->Flags & SELECTED) hd->OHPrefs.Cache=1; else hd->OHPrefs.Cache=0;
if(g2->Flags & SELECTED) hd->OHPrefs.Numbers=1; else hd->OHPrefs.Numbers=0;
if(g3->Flags & SELECTED) hd->OHPrefs.NumInput=1; else hd->OHPrefs.NumInput=0;
if(g4->Flags & SELECTED) hd->OHPrefs.IsPAL=1; else hd->OHPrefs.IsPAL=0;
if(g5->Flags & SELECTED) hd->OHPrefs.Lace=1; else hd->OHPrefs.Lace=0;
DeleteStdWindow(win);
fh=Open(PrefsName,MODE_NEWFILE);
if(fh!=NULL)
{
Write(fh,&hd->OHPrefs,sizeof(struct OHPrefs));
Close(fh);
}
}
}
/* Read-Funktion für Cache */
LONG CacheRead(hd,mem,len)
struct HelpData *hd;
UBYTE *mem;
ULONG len;
{
if(hd->CacheOn==0)
{
return(Read(hd->HelpFile,mem,len));
}
CopyMem(&hd->CacheMemory[hd->CachePos],mem,len);
hd->CachePos+=len;
return(len);
}
/* Seek-Funktion für Cache */
LONG CacheSeek(hd,pos,offset)
struct HelpData *hd;
LONG pos;
LONG offset;
{
if(hd->CacheOn==0)
{
return(Seek(hd->HelpFile,pos,offset));
}
hd->CacheLastPos=hd->CachePos;
switch(offset)
{
case OFFSET_BEGINNING:
hd->CachePos=pos;
break;
case OFFSET_END:
hd->CachePos=hd->CacheSize+pos;
break;
}
return(hd->CacheLastPos);
}
/* IFF-Bild zeigen */
VOID LoadAPicture(hd,num)
struct HelpData *hd;
UBYTE num;
{
LONG o;
ULONG size;
UBYTE byte;
REGISTER BOOL bool;
REGISTER UBYTE *mem;
register struct FileHandle *fh;
o=hd->Picture[num];
if(o!=NULL)
{
CacheSeek(hd,o,OFFSET_BEGINNING);
CacheRead(hd,&byte,1L);
if(byte==0)
{
CacheRead(hd,&hd->String,199);
hd->String[199]=0x00;
bool=ShowPicture(&hd->String);
if(bool==FALSE)
MultiRequest("Bild kann nicht geladen werden:",&hd->String,"Okay",0L);
}
else
{
CacheRead(hd,&size,4L);
if(hd->CacheOn!=0)
{
DisplayPicture(&hd->CacheMemory[hd->CachePos],size);
}
else
{
mem=AllocMem(size,MEMF_CLEAR|MEMF_PUBLIC);
if(mem!=NULL)
{
CacheRead(hd,mem,size);
DisplayPicture(mem,size);
FreeMem(mem,size);
}
}
}
}
}
/* Seite in Seitenliste einfügen */
VOID AddPage(hd)
struct HelpData *hd;
{
REGISTER UBYTE i;
if((hd->LastPagePos>0)&&(hd->Page==hd->LastPage[hd->LastPagePos-1])) return;
hd->ShowLastPageBack=0;
hd->LastPageSelect=hd->LastPagePos;
if(hd->LastPagePos<PAGE_MEMORY)
{
hd->LastPage[hd->LastPagePos]=hd->Page;
hd->LastPagePos++;
}
else
{
for(i=0;i<PAGE_MEMORY;i++)
{
hd->LastPage[i]=hd->LastPage[i+1];
}
hd->LastPage[PAGE_MEMORY-1]=hd->Page;
hd->LastPageSelect=PAGE_MEMORY-1;
}
}